www.gusucode.com > 万能超级搜索引擎 8.2 (商业版) > 万能超级搜索引擎 8.2 (商业版)/downcode.com/followtop/admin/htmlgg4.asp

    <%
set rs=server.createobject("adodb.recordset")
sql="select * from adminuser where username like '"&Session("admin")&"' "
rs.open sql,conn,1,3
Set Fso1=Server.CreateObject("Scripting.FileSystemObject")  '创建fso对象
Set Fout1=Fso1.CreateTextFile(server.mappath("../so/gg4.asp"))
Fout1.WriteLine rs("gg4")
Fout1.Close
rs.close:set rs = nothing
%>